home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual dBase Pro v7.0 / DATA1.CAB / Sample_dBASE / Mugs / Customer.lab < prev    next >
Encoding:
Text File  |  1997-11-20  |  14.8 KB  |  511 lines
  1. //--------------------------------------------------------------
  2. //
  3. //  Customer.lab - Mugs Sample Application
  4. //
  5. //  Customer Address Lables - called from Mugs.mnu
  6. //
  7. //  Dependencies: customer.sql               
  8. //
  9. //  Visual dBASE Samples Group
  10. //
  11. //  $Revision:   1.4  $
  12. //
  13. //  Copyright (c) 1997, Borland International, Inc. 
  14. //  All rights reserved.
  15. //
  16. //---------------------------------------------------------------
  17. ** END HEADER -- do not remove this line
  18. //
  19. // Generated on 10/01/97
  20. //
  21. local r
  22. r = new CUSTOMERReport()
  23. r.render()
  24.  
  25. class CUSTOMERReport of REPORT
  26.    with (this)
  27.       scaleFontSize = 8
  28.       scaleFontBold = false
  29.    endwith
  30.  
  31.    this.DMCONNECT = new DATAMODREF()
  32.    this.DMCONNECT.parent = this
  33.    with (this.DMCONNECT)
  34.       filename = "connect.dmd"
  35.       dataModClass = "ConnectDataModule"
  36.       share = 0
  37.       active = true
  38.       left = 0
  39.       top = 0
  40.    endwith
  41.  
  42.    this.CUSTOMER1 = new QUERY()
  43.    this.CUSTOMER1.parent = this
  44.    with (this.CUSTOMER1)
  45.       left = 1
  46.       top = 1
  47.       database = form.DMCONNECT.ref.dbmugs
  48.       sql = "@customer.sql"
  49.       active = true
  50.    endwith
  51.  
  52.  
  53.  
  54.  
  55.    with (this.printer)
  56.       duplex = 1
  57.       orientation = 1
  58.       paperSource = 15
  59.       paperSize = 1
  60.       resolution = 4
  61.       color = 2
  62.       trueTypeFonts = 2
  63.    endwith
  64.  
  65.  
  66.    this.STREAMSOURCE1 = new STREAMSOURCE(this)
  67.  
  68.  
  69.  
  70.    with (this.STREAMSOURCE1.detailBand)
  71.       height = 1440
  72.       beginNewFrame = true
  73.    endwith
  74.  
  75.  
  76.    this.STREAMSOURCE1.detailBand.VALUENAME = new TEXT(this.STREAMSOURCE1.detailBand)
  77.    with (this.STREAMSOURCE1.detailBand.VALUENAME)
  78.       height = 200
  79.       left = 100
  80.       top = 200
  81.       width = 3500
  82.       metric = 1
  83.       colorNormal = "BtnText"
  84.       suppressIfBlank = true
  85.       fontSize = 8
  86.       text = {||TRIM(this.Form.customer1.Rowset.Fields["First Name"].Value) + " " + TRIM(this.Form.customer1.Rowset.Fields["Last Name"].Value)}
  87.    endwith
  88.  
  89.  
  90.    this.STREAMSOURCE1.detailBand.VALUESTREET1 = new TEXT(this.STREAMSOURCE1.detailBand)
  91.    with (this.STREAMSOURCE1.detailBand.VALUESTREET1)
  92.       height = 200
  93.       left = 100
  94.       top = 400
  95.       width = 3500
  96.       metric = 1
  97.       colorNormal = "BtnText"
  98.       suppressIfBlank = true
  99.       fontSize = 8
  100.       text = {||TRIM(this.Form.customer1.Rowset.Fields["STREET1"].Value)}
  101.    endwith
  102.  
  103.  
  104.    this.STREAMSOURCE1.detailBand.VALUESTREET2 = new TEXT(this.STREAMSOURCE1.detailBand)
  105.    with (this.STREAMSOURCE1.detailBand.VALUESTREET2)
  106.       height = 200
  107.       left = 100
  108.       top = 600
  109.       width = 3500
  110.       metric = 1
  111.       colorNormal = "BtnText"
  112.       suppressIfBlank = true
  113.       fontSize = 8
  114.       text = {||TRIM(this.Form.customer1.Rowset.Fields["STREET2"].Value)}
  115.    endwith
  116.  
  117.  
  118.    this.STREAMSOURCE1.detailBand.VALUECITYSTATEZIP = new TEXT(this.STREAMSOURCE1.detailBand)
  119.    with (this.STREAMSOURCE1.detailBand.VALUECITYSTATEZIP)
  120.       height = 200
  121.       left = 100
  122.       top = 800
  123.       width = 3500
  124.       metric = 1
  125.       colorNormal = "BtnText"
  126.       suppressIfBlank = true
  127.       fontSize = 8
  128.       text = {||TRIM(this.Form.customer1.Rowset.Fields["CITY"].Value) + "," + " " + TRIM(this.Form.customer1.Rowset.Fields["STATE ID"].Value) + " " + TRIM(this.Form.customer1.Rowset.Fields["POSTAL"].Value)}
  129.    endwith
  130.  
  131.  
  132.    this.STREAMSOURCE1.detailBand.VALUECOUNTRY = new TEXT(this.STREAMSOURCE1.detailBand)
  133.    with (this.STREAMSOURCE1.detailBand.VALUECOUNTRY)
  134.       height = 200
  135.       left = 100
  136.       top = 1015
  137.       width = 3500
  138.       metric = 1
  139.       colorNormal = "BtnText"
  140.       suppressIfBlank = true
  141.       fontSize = 8
  142.       text = {||TRIM(this.Form.customer1.Rowset.Fields["COUNTRY"].Value)}
  143.    endwith
  144.  
  145.  
  146.    this.PAGETEMPLATE1 = new PAGETEMPLATE(this)
  147.    with (this.PAGETEMPLATE1)
  148.       height = 15840
  149.       width = 12240
  150.       marginTop = 720
  151.       marginLeft = 273
  152.       marginBottom = 720
  153.       marginRight = 273
  154.       gridLineWidth = 0
  155.    endwith
  156.  
  157.  
  158.    this.PAGETEMPLATE1.STREAMFRAME1 = new STREAMFRAME(this.PAGETEMPLATE1)
  159.    with (this.PAGETEMPLATE1.STREAMFRAME1)
  160.       height = 1440
  161.       width = 3772
  162.       metric = 1
  163.       form.STREAMFRAME1 = form.pagetemplate1.streamframe1
  164.    endwith
  165.  
  166.  
  167.    this.PAGETEMPLATE1.STREAMFRAME2 = new STREAMFRAME(this.PAGETEMPLATE1)
  168.    with (this.PAGETEMPLATE1.STREAMFRAME2)
  169.       height = 1440
  170.       left = 3944
  171.       width = 3772
  172.       metric = 1
  173.       form.STREAMFRAME2 = form.pagetemplate1.streamframe2
  174.    endwith
  175.  
  176.  
  177.    this.PAGETEMPLATE1.STREAMFRAME3 = new STREAMFRAME(this.PAGETEMPLATE1)
  178.    with (this.PAGETEMPLATE1.STREAMFRAME3)
  179.       height = 1440
  180.       left = 7888
  181.       width = 3772
  182.       metric = 1
  183.       form.STREAMFRAME3 = form.pagetemplate1.streamframe3
  184.    endwith
  185.  
  186.  
  187.    this.PAGETEMPLATE1.STREAMFRAME4 = new STREAMFRAME(this.PAGETEMPLATE1)
  188.    with (this.PAGETEMPLATE1.STREAMFRAME4)
  189.       height = 1440
  190.       top = 1440
  191.       width = 3772
  192.       metric = 1
  193.       form.STREAMFRAME4 = form.pagetemplate1.streamframe4
  194.    endwith
  195.  
  196.  
  197.    this.PAGETEMPLATE1.STREAMFRAME5 = new STREAMFRAME(this.PAGETEMPLATE1)
  198.    with (this.PAGETEMPLATE1.STREAMFRAME5)
  199.       height = 1440
  200.       left = 3944
  201.       top = 1440
  202.       width = 3772
  203.       metric = 1
  204.       form.STREAMFRAME5 = form.pagetemplate1.streamframe5
  205.    endwith
  206.  
  207.  
  208.    this.PAGETEMPLATE1.STREAMFRAME6 = new STREAMFRAME(this.PAGETEMPLATE1)
  209.    with (this.PAGETEMPLATE1.STREAMFRAME6)
  210.       height = 1440
  211.       left = 7888
  212.       top = 1440
  213.       width = 3772
  214.       metric = 1
  215.       form.STREAMFRAME6 = form.pagetemplate1.streamframe6
  216.    endwith
  217.  
  218.  
  219.    this.PAGETEMPLATE1.STREAMFRAME7 = new STREAMFRAME(this.PAGETEMPLATE1)
  220.    with (this.PAGETEMPLATE1.STREAMFRAME7)
  221.       height = 1440
  222.       top = 2880
  223.       width = 3772
  224.       metric = 1
  225.       form.STREAMFRAME7 = form.pagetemplate1.streamframe7
  226.    endwith
  227.  
  228.  
  229.    this.PAGETEMPLATE1.STREAMFRAME8 = new STREAMFRAME(this.PAGETEMPLATE1)
  230.    with (this.PAGETEMPLATE1.STREAMFRAME8)
  231.       height = 1440
  232.       left = 3944
  233.       top = 2880
  234.       width = 3772
  235.       metric = 1
  236.       form.STREAMFRAME8 = form.pagetemplate1.streamframe8
  237.    endwith
  238.  
  239.  
  240.    this.PAGETEMPLATE1.STREAMFRAME9 = new STREAMFRAME(this.PAGETEMPLATE1)
  241.    with (this.PAGETEMPLATE1.STREAMFRAME9)
  242.       height = 1440
  243.       left = 7888
  244.       top = 2880
  245.       width = 3772
  246.       metric = 1
  247.       form.STREAMFRAME9 = form.pagetemplate1.streamframe9
  248.    endwith
  249.  
  250.  
  251.    this.PAGETEMPLATE1.STREAMFRAME10 = new STREAMFRAME(this.PAGETEMPLATE1)
  252.    with (this.PAGETEMPLATE1.STREAMFRAME10)
  253.       height = 1440
  254.       top = 4320
  255.       width = 3772
  256.       metric = 1
  257.       form.STREAMFRAME10 = form.pagetemplate1.streamframe10
  258.    endwith
  259.  
  260.  
  261.    this.PAGETEMPLATE1.STREAMFRAME11 = new STREAMFRAME(this.PAGETEMPLATE1)
  262.    with (this.PAGETEMPLATE1.STREAMFRAME11)
  263.       height = 1440
  264.       left = 3944
  265.       top = 4320
  266.       width = 3772
  267.       metric = 1
  268.       form.STREAMFRAME11 = form.pagetemplate1.streamframe11
  269.    endwith
  270.  
  271.  
  272.    this.PAGETEMPLATE1.STREAMFRAME12 = new STREAMFRAME(this.PAGETEMPLATE1)
  273.    with (this.PAGETEMPLATE1.STREAMFRAME12)
  274.       height = 1440
  275.       left = 7888
  276.       top = 4320
  277.       width = 3772
  278.       metric = 1
  279.       form.STREAMFRAME12 = form.pagetemplate1.streamframe12
  280.    endwith
  281.  
  282.  
  283.    this.PAGETEMPLATE1.STREAMFRAME13 = new STREAMFRAME(this.PAGETEMPLATE1)
  284.    with (this.PAGETEMPLATE1.STREAMFRAME13)
  285.       height = 1440
  286.       top = 5760
  287.       width = 3772
  288.       metric = 1
  289.       form.STREAMFRAME13 = form.pagetemplate1.streamframe13
  290.    endwith
  291.  
  292.  
  293.    this.PAGETEMPLATE1.STREAMFRAME14 = new STREAMFRAME(this.PAGETEMPLATE1)
  294.    with (this.PAGETEMPLATE1.STREAMFRAME14)
  295.       height = 1440
  296.       left = 3944
  297.       top = 5760
  298.       width = 3772
  299.       metric = 1
  300.       form.STREAMFRAME14 = form.pagetemplate1.streamframe14
  301.    endwith
  302.  
  303.  
  304.    this.PAGETEMPLATE1.STREAMFRAME15 = new STREAMFRAME(this.PAGETEMPLATE1)
  305.    with (this.PAGETEMPLATE1.STREAMFRAME15)
  306.       height = 1440
  307.       left = 7888
  308.       top = 5760
  309.       width = 3772
  310.       metric = 1
  311.       form.STREAMFRAME15 = form.pagetemplate1.streamframe15
  312.    endwith
  313.  
  314.  
  315.    this.PAGETEMPLATE1.STREAMFRAME16 = new STREAMFRAME(this.PAGETEMPLATE1)
  316.    with (this.PAGETEMPLATE1.STREAMFRAME16)
  317.       height = 1440
  318.       top = 7200
  319.       width = 3772
  320.       metric = 1
  321.       form.STREAMFRAME16 = form.pagetemplate1.streamframe16
  322.    endwith
  323.  
  324.  
  325.    this.PAGETEMPLATE1.STREAMFRAME17 = new STREAMFRAME(this.PAGETEMPLATE1)
  326.    with (this.PAGETEMPLATE1.STREAMFRAME17)
  327.       height = 1440
  328.       left = 3944
  329.       top = 7200
  330.       width = 3772
  331.       metric = 1
  332.       form.STREAMFRAME17 = form.pagetemplate1.streamframe17
  333.    endwith
  334.  
  335.  
  336.    this.PAGETEMPLATE1.STREAMFRAME18 = new STREAMFRAME(this.PAGETEMPLATE1)
  337.    with (this.PAGETEMPLATE1.STREAMFRAME18)
  338.       height = 1440
  339.       left = 7888
  340.       top = 7200
  341.       width = 3772
  342.       metric = 1
  343.       form.STREAMFRAME18 = form.pagetemplate1.streamframe18
  344.    endwith
  345.  
  346.  
  347.    this.PAGETEMPLATE1.STREAMFRAME19 = new STREAMFRAME(this.PAGETEMPLATE1)
  348.    with (this.PAGETEMPLATE1.STREAMFRAME19)
  349.       height = 1440
  350.       top = 8640
  351.       width = 3772
  352.       metric = 1
  353.       form.STREAMFRAME19 = form.pagetemplate1.streamframe19
  354.    endwith
  355.  
  356.  
  357.    this.PAGETEMPLATE1.STREAMFRAME20 = new STREAMFRAME(this.PAGETEMPLATE1)
  358.    with (this.PAGETEMPLATE1.STREAMFRAME20)
  359.       height = 1440
  360.       left = 3944
  361.       top = 8640
  362.       width = 3772
  363.       metric = 1
  364.       form.STREAMFRAME20 = form.pagetemplate1.streamframe20
  365.    endwith
  366.  
  367.  
  368.    this.PAGETEMPLATE1.STREAMFRAME21 = new STREAMFRAME(this.PAGETEMPLATE1)
  369.    with (this.PAGETEMPLATE1.STREAMFRAME21)
  370.       height = 1440
  371.       left = 7888
  372.       top = 8640
  373.       width = 3772
  374.       metric = 1
  375.       form.STREAMFRAME21 = form.pagetemplate1.streamframe21
  376.    endwith
  377.  
  378.  
  379.    this.PAGETEMPLATE1.STREAMFRAME22 = new STREAMFRAME(this.PAGETEMPLATE1)
  380.    with (this.PAGETEMPLATE1.STREAMFRAME22)
  381.       height = 1440
  382.       top = 10080
  383.       width = 3772
  384.       metric = 1
  385.       form.STREAMFRAME22 = form.pagetemplate1.streamframe22
  386.    endwith
  387.  
  388.  
  389.    this.PAGETEMPLATE1.STREAMFRAME23 = new STREAMFRAME(this.PAGETEMPLATE1)
  390.    with (this.PAGETEMPLATE1.STREAMFRAME23)
  391.       height = 1440
  392.       left = 3944
  393.       top = 10080
  394.       width = 3772
  395.       metric = 1
  396.       form.STREAMFRAME23 = form.pagetemplate1.streamframe23
  397.    endwith
  398.  
  399.  
  400.    this.PAGETEMPLATE1.STREAMFRAME24 = new STREAMFRAME(this.PAGETEMPLATE1)
  401.    with (this.PAGETEMPLATE1.STREAMFRAME24)
  402.       height = 1440
  403.       left = 7888
  404.       top = 10080
  405.       width = 3772
  406.       metric = 1
  407.       form.STREAMFRAME24 = form.pagetemplate1.streamframe24
  408.    endwith
  409.  
  410.  
  411.    this.PAGETEMPLATE1.STREAMFRAME25 = new STREAMFRAME(this.PAGETEMPLATE1)
  412.    with (this.PAGETEMPLATE1.STREAMFRAME25)
  413.       height = 1440
  414.       top = 11520
  415.       width = 3772
  416.       metric = 1
  417.       form.STREAMFRAME25 = form.pagetemplate1.streamframe25
  418.    endwith
  419.  
  420.  
  421.    this.PAGETEMPLATE1.STREAMFRAME26 = new STREAMFRAME(this.PAGETEMPLATE1)
  422.    with (this.PAGETEMPLATE1.STREAMFRAME26)
  423.       height = 1440
  424.       left = 3944
  425.       top = 11520
  426.       width = 3772
  427.       metric = 1
  428.       form.STREAMFRAME26 = form.pagetemplate1.streamframe26
  429.    endwith
  430.  
  431.  
  432.    this.PAGETEMPLATE1.STREAMFRAME27 = new STREAMFRAME(this.PAGETEMPLATE1)
  433.    with (this.PAGETEMPLATE1.STREAMFRAME27)
  434.       height = 1440
  435.       left = 7888
  436.       top = 11520
  437.       width = 3772
  438.       metric = 1
  439.       form.STREAMFRAME27 = form.pagetemplate1.streamframe27
  440.    endwith
  441.  
  442.  
  443.    this.PAGETEMPLATE1.STREAMFRAME28 = new STREAMFRAME(this.PAGETEMPLATE1)
  444.    with (this.PAGETEMPLATE1.STREAMFRAME28)
  445.       height = 1440
  446.       top = 12960
  447.       width = 3772
  448.       metric = 1
  449.       form.STREAMFRAME28 = form.pagetemplate1.streamframe28
  450.    endwith
  451.  
  452.  
  453.    this.PAGETEMPLATE1.STREAMFRAME29 = new STREAMFRAME(this.PAGETEMPLATE1)
  454.    with (this.PAGETEMPLATE1.STREAMFRAME29)
  455.       height = 1440
  456.       left = 3944
  457.       top = 12960
  458.       width = 3772
  459.       metric = 1
  460.       form.STREAMFRAME29 = form.pagetemplate1.streamframe29
  461.    endwith
  462.  
  463.  
  464.    this.PAGETEMPLATE1.STREAMFRAME30 = new STREAMFRAME(this.PAGETEMPLATE1)
  465.    with (this.PAGETEMPLATE1.STREAMFRAME30)
  466.       height = 1440
  467.       left = 7888
  468.       top = 12960
  469.       width = 3772
  470.       metric = 1
  471.       form.STREAMFRAME30 = form.pagetemplate1.streamframe30
  472.    endwith
  473.  
  474.  
  475.  
  476.  
  477.    this.firstPageTemplate = this.form.pagetemplate1
  478.    this.form.pagetemplate1.nextPageTemplate = this.form.pagetemplate1
  479.    this.form.pagetemplate1.streamframe1.streamSource = this.form.STREAMSOURCE1
  480.    this.form.pagetemplate1.streamframe2.streamSource = this.form.STREAMSOURCE1
  481.    this.form.pagetemplate1.streamframe3.streamSource = this.form.STREAMSOURCE1
  482.    this.form.pagetemplate1.streamframe4.streamSource = this.form.STREAMSOURCE1
  483.    this.form.pagetemplate1.streamframe5.streamSource = this.form.STREAMSOURCE1
  484.    this.form.pagetemplate1.streamframe6.streamSource = this.form.STREAMSOURCE1
  485.    this.form.pagetemplate1.streamframe7.streamSource = this.form.STREAMSOURCE1
  486.    this.form.pagetemplate1.streamframe8.streamSource = this.form.STREAMSOURCE1
  487.    this.form.pagetemplate1.streamframe9.streamSource = this.form.STREAMSOURCE1
  488.    this.form.pagetemplate1.streamframe10.streamSource = this.form.STREAMSOURCE1
  489.    this.form.pagetemplate1.streamframe11.streamSource = this.form.STREAMSOURCE1
  490.    this.form.pagetemplate1.streamframe12.streamSource = this.form.STREAMSOURCE1
  491.    this.form.pagetemplate1.streamframe13.streamSource = this.form.STREAMSOURCE1
  492.    this.form.pagetemplate1.streamframe14.streamSource = this.form.STREAMSOURCE1
  493.    this.form.pagetemplate1.streamframe15.streamSource = this.form.STREAMSOURCE1
  494.    this.form.pagetemplate1.streamframe16.streamSource = this.form.STREAMSOURCE1
  495.    this.form.pagetemplate1.streamframe17.streamSource = this.form.STREAMSOURCE1
  496.    this.form.pagetemplate1.streamframe18.streamSource = this.form.STREAMSOURCE1
  497.    this.form.pagetemplate1.streamframe19.streamSource = this.form.STREAMSOURCE1
  498.    this.form.pagetemplate1.streamframe20.streamSource = this.form.STREAMSOURCE1
  499.    this.form.pagetemplate1.streamframe21.streamSource = this.form.STREAMSOURCE1
  500.    this.form.pagetemplate1.streamframe22.streamSource = this.form.STREAMSOURCE1
  501.    this.form.pagetemplate1.streamframe23.streamSource = this.form.STREAMSOURCE1
  502.    this.form.pagetemplate1.streamframe24.streamSource = this.form.STREAMSOURCE1
  503.    this.form.pagetemplate1.streamframe25.streamSource = this.form.STREAMSOURCE1
  504.    this.form.pagetemplate1.streamframe26.streamSource = this.form.STREAMSOURCE1
  505.    this.form.pagetemplate1.streamframe27.streamSource = this.form.STREAMSOURCE1
  506.    this.form.pagetemplate1.streamframe28.streamSource = this.form.STREAMSOURCE1
  507.    this.form.pagetemplate1.streamframe29.streamSource = this.form.STREAMSOURCE1
  508.    this.form.pagetemplate1.streamframe30.streamSource = this.form.STREAMSOURCE1
  509.    this.form.STREAMSOURCE1.rowset = this.form.customer1.rowset
  510. endclass
  511.